home *** CD-ROM | disk | FTP | other *** search
- #define CASCADE_PARALLEL 1
- #define ALL_PARALLEL 2
- #define NPAR 40
- #define IMPULSIVE 1
- #define NATURAL 2
- #define PI 3.1415927
-
- #ifndef TRUE
- #define TRUE 1
- #endif
-
- #ifndef FALSE
- #define FALSE 0
- #endif
-
- typedef struct
- {
- long F0hz10; /* Voicing fund freq in Hz */
- long AVdb; /* Amp of voicing in dB, 0 to 70 */
- long F1hz; /* First formant freq in Hz, 200 to 1300 */
- long B1hz; /* First formant bw in Hz, 40 to 1000 */
- long F2hz; /* Second formant freq in Hz, 550 to 3000 */
- long B2hz; /* Second formant bw in Hz, 40 to 1000 */
- long F3hz; /* Third formant freq in Hz, 1200 to 4999 */
- long B3hz; /* Third formant bw in Hz, 40 to 1000 */
- long F4hz; /* Fourth formant freq in Hz, 1200 to 4999 */
- long B4hz; /* Fourth formant bw in Hz, 40 to 1000 */
- long F5hz; /* Fifth formant freq in Hz, 1200 to 4999 */
- long B5hz; /* Fifth formant bw in Hz, 40 to 1000 */
- long F6hz; /* Sixth formant freq in Hz, 1200 to 4999 */
- long B6hz; /* Sixth formant bw in Hz, 40 to 2000 */
- long FNZhz; /* Nasal zero freq in Hz, 248 to 528 */
- long BNZhz; /* Nasal zero bw in Hz, 40 to 1000 */
- long FNPhz; /* Nasal pole freq in Hz, 248 to 528 */
- long BNPhz; /* Nasal pole bw in Hz, 40 to 1000 */
- long ASP; /* Amp of aspiration in dB, 0 to 70 */
- long Kopen; /* # of samples in open period, 10 to 65 */
- long Aturb; /* Breathiness in voicing, 0 to 80 */
- long TLTdb; /* Voicing spectral tilt in dB, 0 to 24 */
- long AF; /* Amp of frication in dB, 0 to 80 */
- long Kskew; /* Skewness of alternate periods, 0 to 40 in sample#/2 */
- long A1; /* Amp of par 1st formant in dB, 0 to 80 */
- long B1phz; /* Par. 1st formant bw in Hz, 40 to 1000 */
- long A2; /* Amp of F2 frication in dB, 0 to 80 */
- long B2phz; /* Par. 2nd formant bw in Hz, 40 to 1000 */
- long A3; /* Amp of F3 frication in dB, 0 to 80 */
- long B3phz; /* Par. 3rd formant bw in Hz, 40 to 1000 */
- long A4; /* Amp of F4 frication in dB, 0 to 80 */
- long B4phz; /* Par. 4th formant bw in Hz, 40 to 1000 */
- long A5; /* Amp of F5 frication in dB, 0 to 80 */
- long B5phz; /* Par. 5th formant bw in Hz, 40 to 1000 */
- long A6; /* Amp of F6 (same as r6pa), 0 to 80 */
- long B6phz; /* Par. 6th formant bw in Hz, 40 to 2000 */
- long ANP; /* Amp of par nasal pole in dB, 0 to 80 */
- long AB; /* Amp of bypass fric. in dB, 0 to 80 */
- long AVpdb; /* Amp of voicing, par in dB, 0 to 70 */
- long Gain0; /* Overall gain, 60 dB is unity, 0 to 60 */
- } klatt_t, *klatt_ptr;
-
- extern klatt_t def_pars;
-
- extern void parwav PROTO((klatt_ptr pars,short int *jwave));
- extern void pr_pars PROTO((void));
- extern int init_synth PROTO((int argc,char *argv[]));
-
- extern int synthesis_model;
- extern int quiet_flag;
- extern int f0_flutter;
- extern long sigmx;
- extern long initsw;
- extern long warnsw;
- extern long dispt;
- extern long disptcum;
- extern long outsl;
- extern long samp_rate;
- extern long nfcascade;
- extern long glsource;
- extern long nspfr;
-
-